home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 49
/
Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso
/
-serious-
/
misc
/
football
/
user
/
swapleaguemode.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1999-11-29
|
1KB
|
39 lines
/* Mode=Run */
/* ***********************************************************************
SWAP LEAGUE MODE PROGRAM FOR FOOTBALL REXX SUITE
--------------------------------------------------
Copyright Mark Naughton 1999
Version Date History
--------------------------------------------------------------------------
1.0 150599 Created for ease of swapping between the different
League table formats.
**************************************************************************
Procedure
---------
1. Check existence of alternate program. If found, rename it as the default
league program, else do it the other way.
************************************************************************** */
parse arg league_file
version = 1
if exists("Exec/Alt_League.rexx") > 0 then do
address command 'c:Rename Exec/League.rexx as Exec/Old_League.rexx'
address command 'c:Rename Exec/Alt_League.rexx as Exec/League.rexx'
end
else do
address command 'c:Rename Exec/League.rexx as Exec/Alt_League.rexx'
address command 'c:Rename Exec/Old_League.rexx as Exec/League.rexx'
end
exit